﻿Public Class ThisAddIn
    Public Shared WithEvents eApp As Excel.Application
    Public Function getExcelApp() As Excel.Application
        getExcelApp = eApp
    End Function
    Private Sub ThisAddIn_Startup() Handles Me.Startup
        eApp = Me.Application

    End Sub
   


    Private Sub ThisAddIn_Shutdown() Handles Me.Shutdown

    End Sub

End Class
